home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 2001 #6 / CD 6 (Black) - 2001.iso / K-CS.dcr / 00175_20 sekunder blink.ls < prev    next >
Encoding:
Text File  |  2001-02-20  |  210 b   |  14 lines
  1. global BlinkObjekt
  2.  
  3. on new me
  4.   cursor(0)
  5.   set BlinkObject to 0
  6.   set the locH of sprite 99 to 780
  7.   set BlinkObjekt to new(script "Blink", 15, 120)
  8. end
  9.  
  10. on exitFrame
  11.   checkBlink(BlinkObjekt)
  12.   go(#loop)
  13. end
  14.